object SpecForm: TSpecForm
  Left = 97
  Top = 123
  Width = 791
  Height = 237
  Caption = 'Define a Species'
  Color = 16301063
  Font.Charset = ANSI_CHARSET
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = 'Times New Roman'
  Font.Style = [fsBold]
  OldCreateOrder = False
  OnActivate = FormActivate
  PixelsPerInch = 96
  TextHeight = 15
  object Label1: TLabel
    Left = 8
    Top = 8
    Width = 51
    Height = 19
    Caption = 'Species'
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = 'Times New Roman'
    Font.Style = [fsBold]
    ParentFont = False
  end
  object Label2: TLabel
    Left = 400
    Top = 8
    Width = 46
    Height = 19
    Caption = 'Log K '
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = 'Times New Roman'
    Font.Style = [fsBold]
    ParentFont = False
  end
  object Label4: TLabel
    Left = 400
    Top = 64
    Width = 53
    Height = 19
    Caption = 'Delta H'
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = 'Times New Roman'
    Font.Style = [fsBold]
    ParentFont = False
  end
  object Label5: TLabel
    Left = 400
    Top = 88
    Width = 50
    Height = 19
    Caption = 'Delta S'
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = 'Times New Roman'
    Font.Style = [fsBold]
    ParentFont = False
  end
  object Label3: TLabel
    Left = 560
    Top = 64
    Width = 53
    Height = 19
    Caption = 'kJ/mole'
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = 'Times New Roman'
    Font.Style = [fsBold]
    ParentFont = False
  end
  object Label6: TLabel
    Left = 560
    Top = 88
    Width = 92
    Height = 19
    Caption = 'J/mole Kelvin'
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = 'Times New Roman'
    Font.Style = [fsBold]
    ParentFont = False
  end
  object Label7: TLabel
    Left = 8
    Top = 24
    Width = 45
    Height = 19
    Caption = 'Name:'
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = 'Times New Roman'
    Font.Style = [fsBold]
    ParentFont = False
  end
  object Label8: TLabel
    Left = 16
    Top = 96
    Width = 179
    Height = 19
    Caption = 'Stoichiometric Coefficients'
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = 'Times New Roman'
    Font.Style = [fsBold]
    ParentFont = False
  end
  object Label10: TLabel
    Left = 560
    Top = 8
    Width = 62
    Height = 19
    Caption = 'Std. Dev.'
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = 'Times New Roman'
    Font.Style = [fsBold]
    ParentFont = False
  end
  object NameEdit: TEdit
    Left = 65
    Top = 16
    Width = 175
    Height = 23
    Hint = 'Name of this species'
    ParentShowHint = False
    ShowHint = True
    TabOrder = 0
    OnExit = NameEditExit
  end
  object LogKEdit: TEdit
    Left = 464
    Top = 8
    Width = 89
    Height = 27
    Hint = 'Log K for formation of this species from these components'
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = 'Times New Roman'
    Font.Style = [fsBold]
    ParentFont = False
    ParentShowHint = False
    ShowHint = True
    TabOrder = 2
    OnExit = LogKEditExit
  end
  object STypeGroup: TRadioGroup
    Left = 256
    Top = 8
    Width = 129
    Height = 81
    Hint = 'Use precipitate if the solid may form'
    Caption = 'Type of Species'
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = 'Times New Roman'
    Font.Style = [fsBold]
    Items.Strings = (
      'Dissolved '
      'Precipitate')
    ParentFont = False
    ParentShowHint = False
    ShowHint = True
    TabOrder = 1
    TabStop = True
    OnExit = STypeGroupExit
  end
  object StoichiometryGrid: TStringGrid
    Left = 16
    Top = 120
    Width = 641
    Height = 73
    Hint = 'Stoichiometric coefficients for the formation reaction'
    ColCount = 41
    RowCount = 2
    ParentShowHint = False
    ShowHint = True
    TabOrder = 6
    OnClick = StoichiometryGridClick
    ColWidths = (
      64
      71
      67
      66
      63
      62
      70
      64
      64
      64
      64
      64
      64
      64
      64
      64
      64
      64
      64
      64
      64
      64
      64
      64
      64
      64
      64
      64
      64
      64
      64
      64
      64
      64
      64
      64
      64
      64
      64
      64
      64)
  end
  object AcceptBtn: TBitBtn
    Left = 688
    Top = 96
    Width = 75
    Height = 25
    Hint = 'Make this species part of the system definition'
    Caption = 'Accept'
    ParentShowHint = False
    ShowHint = True
    TabOrder = 7
    OnClick = AcceptBtnClick
  end
  object DeleteBtn: TBitBtn
    Left = 688
    Top = 136
    Width = 75
    Height = 25
    Hint = 'Return to system definition page'
    Caption = 'Cancel'
    ParentShowHint = False
    ShowHint = True
    TabOrder = 8
    OnClick = DeleteBtnClick
  end
  object DelHEdit: TEdit
    Left = 464
    Top = 64
    Width = 89
    Height = 23
    Hint = 'Reaction Enthalpy in kJ/mole'
    ParentShowHint = False
    ShowHint = True
    TabOrder = 3
    OnExit = DelHEditExit
  end
  object DelSEdit: TEdit
    Left = 464
    Top = 88
    Width = 89
    Height = 23
    Hint = 'Reaction Entropy in J / mole Kelvin'
    ParentShowHint = False
    ShowHint = True
    TabOrder = 4
    OnExit = DelSEditExit
  end
  object ThermoBox: TCheckBox
    Left = 400
    Top = 40
    Width = 249
    Height = 17
    Hint = 'Check to calculate log K from Delta H, Delta S and Temperature'
    Caption = 'Calculate log K from H, S and T'
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = 'Times New Roman'
    Font.Style = [fsBold]
    ParentFont = False
    ParentShowHint = False
    ShowHint = True
    TabOrder = 5
    OnClick = ThermoBoxClick
  end
  object HelpBtn: TButton
    Left = 688
    Top = 168
    Width = 75
    Height = 25
    Caption = 'Help'
    TabOrder = 9
    OnClick = HelpBtnClick
  end
  object StdDevEdit: TEdit
    Left = 624
    Top = 8
    Width = 89
    Height = 27
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = 'Times New Roman'
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 10
    OnExit = StdDevEditExit
  end
end
